/home/eric/app/gap/gap-4.12.2/gap -q -o 32g << EOI
f := "cyclic-groups.csv";;
for order in [1..100] do
	for idx in [1..NumberSmallGroups(order)] do
		G := SmallGroup(order, idx);;
		result := IsCyclic(G);;
		AppendTo(f, order, ", ", idx, ", ", result, "\n");;
	od;;
od;;
EOI

